This forum is closed to new posts and
responses. Individual names altered for privacy purposes. The information contained in this website is provided for informational purposes only and should not be construed as a forum for customer support requests. Any customer support requests should be directed to the official HCL customer support channels below:
RE: Text in body field in email ~Mario Lopkistergon 8.Dec.03 06:29 PM a Web browser Notes Client 6.0.1Windows XP
I would suggest this to simply everything. You want tot contents of the adoc body field so just copy the field.
new code would have the newitem set line to be after the set citem line:
Dim newitem As notesrichtextitem
With memo
.EncryptOnSend = False
.form ="Memo"
.sendto="abc@cc.com"
.BlindCopyTo = adoc.BlindCopyTo
End With
Set citem = adoc.GetFirstItem("Body")
Set newitem= citem.copyitemtodocument(memo, "Body")
Call memo.Send(False)
......................
The difference here is that once have an handle on the adoc body field just copy it over to the memo doc if you are not going to change any of the text properties.